home *** CD-ROM | disk | FTP | other *** search
/ CD Loisirs 2 / CD Loisirs 02 / CD Loisirs CD 002.mdf / pc / nympheas / sources / s7_balades_son.k < prev    next >
Encoding:
Text File  |  1994-01-01  |  3.0 KB  |  181 lines
  1. object S7_BALADES_SON is MEDIADISTRIBUTOR
  2. with
  3.     Duration is -1;
  4.     X is 0; Y is 0; Width is 640; Height is 480;
  5.     Items is [
  6.         S7A2_007_PIC,
  7.         S7A4_008_PIC,
  8.         S7A9_111_PIC,
  9.         S7A8_110_PIC,
  10.         S7A10_112_PIC,
  11.         S7A5_BOUTON_F_TE,
  12.         S7A6_BOUTON_INTIME,
  13.         S7A7_BOUTON_PAYS
  14.     ];
  15. end;
  16.  
  17. object S7A2_007_PIC is MEDIADELEGATOR
  18. has
  19.     
  20.     OffScreen()
  21.         do
  22.             self.GoToBeginning();
  23.             self.Run(true);
  24.             TRANSITION.Set(WipeTop, 300);
  25.             self.Show(true);
  26.         end;
  27.     
  28.     Finished()
  29.         do
  30.             TRANSITION.Set(WipeTop, 300);
  31.             S7A4_008_PIC.Show(true);
  32.             S7A4_008_PIC.GoToBeginning();
  33.             S7A4_008_PIC.Run(true);
  34.             S7A5_BOUTON_F_TE.Enable(true);
  35.             S7A6_BOUTON_INTIME.Enable(true);
  36.             S7A7_BOUTON_PAYS.Enable(true);
  37.         end;
  38.     
  39. with
  40.     Target is C294_007_PIC;
  41.     Duration is 1000;
  42.     X is 0; Y is 0; Width is 640; Height is 480;
  43. end;
  44.  
  45. object S7A4_008_PIC is MEDIADELEGATOR
  46. has
  47.     
  48.     OffScreen()
  49.         do
  50.             self.Show(false);
  51.         end;
  52.     
  53.     Finished()
  54.         do
  55.             APPLICATION.GoBack(MEDIADISTRIBUTOR0);
  56.         end;
  57.     
  58. with
  59.     Target is C295_008_PIC;
  60.     Duration is 1200;
  61.     X is 0; Y is 0; Width is 640; Height is 480;
  62. end;
  63.  
  64. object S7A9_111_PIC is MEDIADELEGATOR
  65. has
  66.     
  67.     OffScreen()
  68.         do
  69.             self.Show(false);
  70.         end;
  71.     
  72.     Finished()
  73.         do
  74.             APPLICATION.GoTo(S498_ECRAN_FIN);
  75.         end;
  76.     
  77. with
  78.     Target is C306_111_PIC;
  79.     Duration is 1000;
  80.     X is 0; Y is 0; Width is 640; Height is 480;
  81. end;
  82.  
  83. object S7A8_110_PIC is MEDIADELEGATOR
  84. has
  85.     
  86.     OffScreen()
  87.         do
  88.             self.Show(false);
  89.         end;
  90.     
  91.     Finished()
  92.         do
  93.             APPLICATION.GoTo(S498_ECRAN_FIN);
  94.         end;
  95.     
  96. with
  97.     Target is C305_110_PIC;
  98.     Duration is 1000;
  99.     X is 0; Y is 0; Width is 640; Height is 480;
  100. end;
  101.  
  102. object S7A10_112_PIC is MEDIADELEGATOR
  103. has
  104.     
  105.     OffScreen()
  106.         do
  107.             self.Show(false);
  108.         end;
  109.     
  110.     Finished()
  111.         do
  112.             APPLICATION.GoTo(S498_ECRAN_FIN);
  113.         end;
  114.     
  115. with
  116.     Target is C307_112_PIC;
  117.     Duration is 1000;
  118.     X is 0; Y is 0; Width is 640; Height is 480;
  119. end;
  120.  
  121. object S7A5_BOUTON_F_TE is MEDIADELEGATOR
  122. has
  123.     
  124.     MouseUp(theX, theY)
  125.         do
  126.             TRANSITION.Set(WipeTop, 300);
  127.             S7A4_008_PIC.GoToBeginning();
  128.             S7A8_110_PIC.Show(true);
  129.             S7A8_110_PIC.GoToBeginning();
  130.             S7A8_110_PIC.Run(true);
  131.             self.Enable(false);
  132.             S7A6_BOUTON_INTIME.Enable(false);
  133.             S7A7_BOUTON_PAYS.Enable(false);
  134.         end;
  135.     
  136. with
  137.     Duration is -1;
  138.     X is 79; Y is 346; Width is 42; Height is 41;
  139. end;
  140.  
  141. object S7A6_BOUTON_INTIME is MEDIADELEGATOR
  142. has
  143.     
  144.     MouseUp(theX, theY)
  145.         do
  146.             TRANSITION.Set(WipeTop, 300);
  147.             S7A4_008_PIC.GoToBeginning();
  148.             S7A9_111_PIC.Show(true);
  149.             S7A9_111_PIC.GoToBeginning();
  150.             S7A9_111_PIC.Run(true);
  151.             self.Enable(false);
  152.             S7A5_BOUTON_F_TE.Enable(false);
  153.             S7A7_BOUTON_PAYS.Enable(false);
  154.         end;
  155.     
  156. with
  157.     Duration is -1;
  158.     X is 295; Y is 346; Width is 40; Height is 40;
  159. end;
  160.  
  161. object S7A7_BOUTON_PAYS is MEDIADELEGATOR
  162. has
  163.     
  164.     MouseUp(theX, theY)
  165.         do
  166.             TRANSITION.Set(WipeTop, 300);
  167.             S7A4_008_PIC.GoToBeginning();
  168.             S7A10_112_PIC.Show(true);
  169.             S7A10_112_PIC.GoToBeginning();
  170.             S7A10_112_PIC.Run(true);
  171.             self.Enable(false);
  172.             S7A6_BOUTON_INTIME.Enable(false);
  173.             S7A5_BOUTON_F_TE.Enable(false);
  174.         end;
  175.     
  176. with
  177.     Duration is -1;
  178.     X is 505; Y is 346; Width is 43; Height is 41;
  179. end;
  180.  
  181.